home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Top 200 Programs
/
Top 200 Programs.iso
/
Bob8
/
THOMPSON
/
LIBERTY
/
PRODUCT
/
LB14W.EXE
/
ELLIPSES.BAS
< prev
next >
Wrap
BASIC Source File
|
1992-09-06
|
310b
|
15 lines
' draw some ellipses
nomainwin
open "Ellipses" for graphics as #1
print #1, "down"
print #1, "place 130 130"
for x = 30 to 230 step 10
print #1, "ellipse "; x ; " "; 260 - x
next x
print #1, "flush"
input r$
close #1